Fix arbitrary INT_MAX limit on referrer repr

* src/pdumper.c (print_paths_to_root_1):
Don’t assume strlen (repr) < INT_MAX.

diff --git a/src/pdumper.c b/src/pdumper.c
index a028600ea79eee3aae317608f13657d232819e52..c00f8a0af5472e0388440d7f40c9ee1d0f8a51de 100644 (file)
--- a/src/pdumper.c
+++ b/src/pdumper.c
@@ -1405,7 +1405,8 @@ print_paths_to_root_1 (struct dump_context *ctx,
       Lisp_Object repr = Fprin1_to_string (referrer, Qnil);
       for (int i = 0; i < level; ++i)
         fputc (' ', stderr);
-      fprintf (stderr, "%s\n", SDATA (repr));
+      fwrite (SDATA (repr), 1, SBYTES (repr), stderr);
+      fputc ('\n', stderr);
       print_paths_to_root_1 (ctx, referrer, level + 1);
     }
 }